﻿
<Serializable()> Public Class StructureUpAirTierData
    Implements ICloneable
    ''' <summary>
    ''' 数据标示 (Integer)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_DataNameplate As Integer = 0
    ''' <summary>
    ''' 
    ''' </summary>
    ''' <remarks></remarks>
    Private m_TimeRelease As Integer = 9
    ''' <summary>
    ''' 气压[10pa] (Integer)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_Airpressure As Integer = 9999
    ''' <summary>
    ''' 位势高度 (Integer)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_Height As Integer = -99999
    ''' <summary>
    ''' 气温 (Double)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_AirTemperature As Double = -999
    ''' <summary>
    ''' 相对湿度 (Integer)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_Humidity As Integer = 999
    ''' <summary>
    ''' 风向[单位度] (Double)
    ''' </summary>
    ''' <remarks></remarks>
    Public m_Vane As Double = 999
    ''' <summary>
    ''' 风速[m/s] (Double)
    ''' </summary>
    ''' <remarks></remarks>
    Public m_WindSpeed As String = -999
    ''' <summary>
    ''' 
    ''' </summary>
    ''' <remarks></remarks>
    Private m_QualityFlags As Integer = 999999
    ''' <summary>
    ''' 层的特征 (Integer)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_TierMark As Integer = 9
    ''' <summary>
    ''' 数据标示 (Integer)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property DataNameplate() As Integer
        Get
            Return Me.m_DataNameplate
        End Get
        Set(ByVal value As Integer)
            Me.m_DataNameplate = value
        End Set
    End Property
    ''' <summary>
    ''' 
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property TimeRelease() As Integer
        Get
            Return Me.m_TimeRelease
        End Get
        Set(ByVal value As Integer)
            Me.m_TimeRelease = value
        End Set
    End Property
    ''' <summary>
    ''' 气压[10pa] (Integer)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property Airpressure() As Integer
        Get
            Return Me.m_Airpressure
        End Get
        Set(ByVal value As Integer)
            Me.m_Airpressure = value
        End Set
    End Property
    ''' <summary>
    '''  位势高度 (Integer)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property Height() As Integer
        Get
            Return Me.m_Height
        End Get
        Set(ByVal value As Integer)
            Me.m_Height = value
        End Set
    End Property
    ''' <summary>
    ''' 气温 (Double)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property AirTemperature() As Double
        Get
            Return Me.m_AirTemperature
        End Get
        Set(ByVal value As Double)
            Me.m_AirTemperature = value
        End Set
    End Property
    ''' <summary>
    ''' 相对湿度 (Integer)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property Humidity() As Integer
        Get
            Return Me.m_Humidity
        End Get
        Set(ByVal value As Integer)
            Me.m_Humidity = value
        End Set
    End Property
    ''' <summary>
    ''' 风向[单位度] (Double)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property WindVane() As Double
        Get
            Return Me.m_Vane
        End Get
        Set(ByVal value As Double)
            Me.m_Vane = value
        End Set
    End Property
    ''' <summary>
    ''' 风速[m/s] (Double)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property WindSpeed() As Double
        Get
            Return Me.m_WindSpeed
        End Get
        Set(ByVal value As Double)
            Me.m_WindSpeed = value
        End Set
    End Property
    ''' <summary>
    ''' 
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property QualityFlags() As Integer
        Get
            Return Me.m_QualityFlags
        End Get
        Set(ByVal value As Integer)
            Me.m_QualityFlags = value
        End Set
    End Property
    ''' <summary>
    ''' 层的特征 (Integer)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property TierMark() As Integer
        Get
            Return Me.m_TierMark
        End Get
        Set(ByVal value As Integer)
            Me.m_TierMark = value
        End Set
    End Property
    Public Function Clone() As Object Implements System.ICloneable.Clone
        Dim obj As New StructureUpAirTierData

        obj.DataNameplate = Me.m_DataNameplate
        obj.TimeRelease = Me.m_TimeRelease
        obj.Airpressure = Me.m_Airpressure
        obj.Height = Me.m_Height
        obj.AirTemperature = Me.m_AirTemperature
        obj.Humidity = Me.m_Humidity
        obj.m_Vane = Me.m_Vane
        obj.WindSpeed = Me.m_WindSpeed
        obj.QualityFlags = Me.m_QualityFlags
        obj.TierMark = Me.m_TierMark
        Return obj
    End Function
End Class
